Aquà presentamos los resultados de las encuestas de evaluación institucional llevada a cabo en junio del 2014 en la que se recabaron datos de los docentes de la carrera de Fisioterapia y KinesiologÃa de la Facultad de Ciencias dee la Salud de la Universidad del Norte. La encuesta consistió en un formulario de 110 preguntas evaluando cada una de las siguientes dimensiones:
El formulario de encuesta también incluyó preguntas acerca del Año de Contratación del docente. Se obtuvieron 21 formularios de respuestas, los cuales fueron cargados en una base de datos en formato .csv para su análisis estadÃstico. Los datos fueron procesados y analizados con R versión 3.1.0. Este documento fue redactado utilizando MarkDown en RStudio versión 0.98.932 y el paquete knitr versión 1.6 de Yihui Xie.
Primero definimos las caracterÃsticas globales del reporte y cargamos la base de datos:
require(knitr)
## Loading required package: knitr
opts_chunk$set(warning = FALSE, message = FALSE, fig.height = 8, fig.width = 14)
data.docentes <- read.csv("../Fisioterapia2014Docentes.csv")
Recodificamos todos los niveles para todas las variables que representan preguntas, utilizando las etiquetas establecidas en el formulario:
require(plyr)
for(i in 2:111){
data.docentes[, i] <- factor(data.docentes[, i])
data.docentes[, i] <- revalue(data.docentes[, i], c("1" = "SÃ", "2" = "No", "3" = "En parte", "4" = "Sin opinión/No sabe"))}
Cargamos las preguntas contenidas en el formulario:
source("DocentesQ.R")
Para la presentación de los resultados utilizaremos gráficos de barras, según la siguiente función:
Q.plots <- function(x, y){
table.Q <- prop.table(table(x))*100
par(mar = c(2,5,7,2) + 0.1)
plot.Q <- barplot(table.Q, main = y, cex.main = 2, col = terrain.colors(9),
ylab = "% Docentes", cex.lab = 1.5, cex.axis = 1.2, cex.names = 1.5)
text(plot.Q, 2, round(table.Q, 1), cex = 1.5)
}
La distribución por Año de Contratación fue la siguiente:
Q.plots(data.docentes$contrato, Contrato)
A continuación presentarmos los resultados de las respuestas dadas por los docentes.
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q11a, Q11a)
Q.plots(data.docentes$Q11b, Q11b)
Q.plots(data.docentes$Q11c, Q11c)
Q.plots(data.docentes$Q11d, Q11d)
Q.plots(data.docentes$Q11e, Q11e)
Q.plots(data.docentes$Q11f, Q11f)
Q.plots(data.docentes$Q11g, Q11g)
Q.plots(data.docentes$Q11h, Q11h)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q12a, Q12a)
Q.plots(data.docentes$Q12b, Q12b)
Q.plots(data.docentes$Q12c, Q12c)
Q.plots(data.docentes$Q12d, Q12d)
Q.plots(data.docentes$Q12e, Q12e)
Q.plots(data.docentes$Q12f, Q12f)
Q.plots(data.docentes$Q12g, Q12g)
Q.plots(data.docentes$Q12h, Q12h)
Q.plots(data.docentes$Q12i, Q12i)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q21a, Q21a)
Q.plots(data.docentes$Q21b, Q21b)
Q.plots(data.docentes$Q21c, Q21c)
Q.plots(data.docentes$Q21d, Q21d)
Q.plots(data.docentes$Q21e, Q21e)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q22a, Q22a)
Q.plots(data.docentes$Q22b, Q22b)
Q.plots(data.docentes$Q22c, Q22c)
Q.plots(data.docentes$Q22d, Q22d)
Q.plots(data.docentes$Q22e, Q22e)
Q.plots(data.docentes$Q22f, Q22f)
Q.plots(data.docentes$Q22g, Q22g)
Q.plots(data.docentes$Q22h, Q22h)
Q.plots(data.docentes$Q22i, Q22i)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q23a, Q23a)
Q.plots(data.docentes$Q23b, Q23b)
Q.plots(data.docentes$Q23c, Q23c)
Q.plots(data.docentes$Q23d, Q23d)
Q.plots(data.docentes$Q23e, Q23e)
Q.plots(data.docentes$Q23f, Q23f)
Q.plots(data.docentes$Q23g, Q23g)
Q.plots(data.docentes$Q23h, Q23h)
Q.plots(data.docentes$Q23i, Q23i)
Q.plots(data.docentes$Q23j, Q23j)
Q.plots(data.docentes$Q23k, Q23k)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q24a, Q24a)
Q.plots(data.docentes$Q24b, Q24b)
Q.plots(data.docentes$Q24c, Q24c)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q25a, Q25a)
Q.plots(data.docentes$Q25b, Q25b)
Q.plots(data.docentes$Q25c, Q25c)
Q.plots(data.docentes$Q25d, Q25d)
Q.plots(data.docentes$Q25e, Q25e)
Q.plots(data.docentes$Q25f, Q25f)
Q.plots(data.docentes$Q25g, Q25g)
Q.plots(data.docentes$Q25h, Q25h)
Q.plots(data.docentes$Q25i, Q25i)
Q.plots(data.docentes$Q25j, Q25j)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q31a, Q31a)
Q.plots(data.docentes$Q31b, Q31b)
Q.plots(data.docentes$Q31c, Q31c)
Q.plots(data.docentes$Q31d, Q31d)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q32a, Q32a)
Q.plots(data.docentes$Q32b, Q32b)
Q.plots(data.docentes$Q32c, Q32c)
Q.plots(data.docentes$Q32d, Q32d)
Q.plots(data.docentes$Q32e, Q32e)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q33a, Q33a)
Q.plots(data.docentes$Q33b, Q33b)
Q.plots(data.docentes$Q33c, Q33c)
Q.plots(data.docentes$Q33d, Q33d)
Q.plots(data.docentes$Q33e, Q33e)
Q.plots(data.docentes$Q33f, Q33f)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q34a, Q34a)
Q.plots(data.docentes$Q34b, Q34b)
Q.plots(data.docentes$Q34c, Q34c)
Q.plots(data.docentes$Q34d, Q34d)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q41a, Q41a)
Q.plots(data.docentes$Q41b, Q41b)
Q.plots(data.docentes$Q41c, Q41c)
Q.plots(data.docentes$Q41d, Q41d)
Q.plots(data.docentes$Q41e, Q41e)
Q.plots(data.docentes$Q41f, Q41f)
Q.plots(data.docentes$Q41g, Q41g)
Q.plots(data.docentes$Q41h, Q41h)
Q.plots(data.docentes$Q41i, Q41i)
Q.plots(data.docentes$Q41j, Q41j)
Q.plots(data.docentes$Q41k, Q41k)
Q.plots(data.docentes$Q41l, Q41l)
Q.plots(data.docentes$Q41m, Q41m)
Q.plots(data.docentes$Q41n, Q41n)
Q.plots(data.docentes$Q41o, Q41o)
Q.plots(data.docentes$Q41p, Q41p)
Q.plots(data.docentes$Q41q, Q41q)
Q.plots(data.docentes$Q41r, Q41r)
Q.plots(data.docentes$Q41s, Q41s)
Q.plots(data.docentes$Q41t, Q41t)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q42a, Q42a)
Q.plots(data.docentes$Q42b, Q42b)
Q.plots(data.docentes$Q42c, Q42c)
Los resultados de esta dimensión son los siguientes:
Q.plots(data.docentes$Q43a, Q43a)
Q.plots(data.docentes$Q43b, Q43b)
Q.plots(data.docentes$Q43c, Q43c)
Q.plots(data.docentes$Q43d, Q43d)
Q.plots(data.docentes$Q43e, Q43e)
Q.plots(data.docentes$Q43f, Q43f)
Q.plots(data.docentes$Q43g, Q43g)
Q.plots(data.docentes$Q43h, Q43h)
Q.plots(data.docentes$Q43i, Q43i)